inherited FrmEstatistica_Receb: TFrmEstatistica_Receb
  Left = 133
  Top = 152
  Caption = 'Contas a Receber - Estatistica de Recebimentos'
  ClientHeight = 343
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Height = 170
    object Label10: TLabel
      Left = 7
      Top = 125
      Width = 195
      Height = 14
      Caption = 'Data Base p/ Pagtos fora do per'#237'odo'
    end
    object BtnInsereDocumentos: TSpeedButton
      Left = 4
      Top = 2
      Width = 25
      Height = 18
      Hint = 'Insere um documento na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtnInsereDocumentosClick
    end
    object Label1: TLabel
      Left = 31
      Top = 5
      Width = 70
      Height = 14
      Caption = 'Documentos'
      Font.Charset = ANSI_CHARSET
      Font.Color = clActiveCaption
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object BtnInsereLiquidacao: TSpeedButton
      Left = 191
      Top = 2
      Width = 25
      Height = 18
      Hint = 'Insere um tipo de liquida'#231#227'o na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtnInsereLiquidacaoClick
    end
    object Label5: TLabel
      Left = 218
      Top = 4
      Width = 93
      Height = 14
      Caption = 'Tipos Liquida'#231#227'o'
      Font.Charset = ANSI_CHARSET
      Font.Color = clActiveCaption
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object ListaDoc: TCheckListBox
      Left = 2
      Top = 21
      Width = 167
      Height = 92
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 0
      OnKeyDown = ListaDocKeyDown
    end
    object ListaTpBaixa: TCheckListBox
      Left = 190
      Top = 21
      Width = 163
      Height = 92
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 1
      OnKeyDown = ListaTpBaixaKeyDown
    end
    object edtEnt_tipo: TRadioGroup
      Left = 358
      Top = 9
      Width = 142
      Height = 75
      Caption = 'Caracteristica do Cliente'
      Items.Strings = (
        '0 - Varejista'
        '1 - Grande Magazine'
        '2 - Ambos')
      TabOrder = 2
    end
    object edtvalida: TCheckBox
      Left = 5
      Top = 147
      Width = 197
      Height = 17
      Caption = 'Valida Pagto em dias n'#227'o '#250'teis'
      TabOrder = 4
      Visible = False
    end
    object edtbase: TDateEdit
      Left = 208
      Top = 120
      Width = 95
      Height = 21
      NumGlyphs = 2
      TabOrder = 3
    end
    object GroupBox1: TGroupBox
      Left = 358
      Top = 90
      Width = 160
      Height = 73
      Caption = 'Per'#237'odo a ser processado'
      TabOrder = 5
      object Label2: TLabel
        Left = 31
        Top = 21
        Width = 54
        Height = 14
        Caption = 'Iniciar em'
      end
      object Label3: TLabel
        Left = 17
        Top = 51
        Width = 68
        Height = 14
        Caption = 'Encerrar em'
      end
      object edtiniciar: TMaskEdit
        Left = 93
        Top = 16
        Width = 54
        Height = 22
        BevelKind = bkFlat
        BorderStyle = bsNone
        EditMask = '99/9999;1;'
        MaxLength = 7
        TabOrder = 0
        Text = '  /    '
      end
      object edtencerrar: TMaskEdit
        Left = 93
        Top = 46
        Width = 54
        Height = 22
        BevelKind = bkFlat
        BorderStyle = bsNone
        EditMask = '99/9999;1;'
        MaxLength = 7
        TabOrder = 1
        Text = '  /    '
      end
    end
  end
  inherited Panel2: TPanel
    Top = 276
    inherited bimprimir: TFlatButton
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      OnClick = btncancelarClick
    end
  end
  inherited sb: TStatusBar
    Top = 324
  end
  inherited Panel3: TPanel
    object Label16: TLabel [1]
      Left = 162
      Top = 3
      Width = 208
      Height = 13
      Caption = 'R4+USUARIO+.TIPO - arquivo texto auxiliar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Visible = False
    end
  end
  object PnlTipoLiquidacao: TPanel [4]
    Left = 491
    Top = 40
    Width = 365
    Height = 225
    Color = clGray
    TabOrder = 4
    Visible = False
    OnExit = PnlTipoLiquidacaoExit
    object Label19: TLabel
      Left = 16
      Top = 8
      Width = 161
      Height = 20
      Caption = 'Tipos de Liquida'#231#227'o'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clAqua
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DbgTipoLiquidacao: TDBGrid
      Left = 1
      Top = 32
      Width = 363
      Height = 192
      Hint = 'Duplo clique para enviar conta para a listagem.'
      Align = alBottom
      Color = clTeal
      DataSource = DsTipoLiquidacao
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = DbgTipoLiquidacaoDblClick
      OnKeyDown = DbgTipoLiquidacaoKeyDown
      Columns = <
        item
          Expanded = False
          FieldName = 'tipb_codigo'
          Width = 54
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Descricao'
          Width = 241
          Visible = True
        end>
    end
    object BitBtn3: TBitBtn
      Left = 312
      Top = 4
      Width = 36
      Height = 25
      Caption = 'Sair'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn3Click
    end
  end
  object PnlTipoDocumento: TPanel [5]
    Left = 516
    Top = 4
    Width = 365
    Height = 225
    Color = clGray
    TabOrder = 5
    Visible = False
    OnExit = PnlTipoDocumentoExit
    object Label17: TLabel
      Left = 16
      Top = 8
      Width = 166
      Height = 20
      Caption = 'Tipo de Documentos'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clAqua
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DbgTipoDocumento: TDBGrid
      Left = 1
      Top = 32
      Width = 363
      Height = 192
      Hint = 'Duplo clique para enviar conta para a listagem.'
      Align = alBottom
      Color = clTeal
      DataSource = DsTpDoc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = DbgTipoDocumentoDblClick
      OnKeyDown = DbgTipoDocumentoKeyDown
      Columns = <
        item
          Expanded = False
          FieldName = 'tipd_codigo'
          Width = 42
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'descricao'
          Width = 276
          Visible = True
        end>
    end
    object BtnSair: TBitBtn
      Left = 312
      Top = 4
      Width = 36
      Height = 25
      Caption = 'Sair'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BtnSairClick
    end
  end
  inherited RDP: TRDprint
    OnNewPage = RDPNewPage
  end
  object DsTpDoc: TDataSource
    AutoEdit = False
    DataSet = CdsTpDoc
    Left = 368
    Top = 16
  end
  object CdsTpDoc: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 376
    Top = 16
    object CdsTpDoctipd_codigo: TStringField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'tipd_codigo'
      Size = 1
    end
    object CdsTpDocdescricao: TStringField
      DisplayLabel = 'Descri'#231#227'o'
      FieldName = 'descricao'
      Size = 40
    end
  end
  object DsTipoLiquidacao: TDataSource
    AutoEdit = False
    DataSet = CdsTipoLiquidacao
    Left = 406
    Top = 16
  end
  object CdsTipoLiquidacao: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 413
    Top = 16
    object CdsTipoLiquidacaotipb_codigo: TStringField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'tipb_codigo'
      Size = 2
    end
    object CdsTipoLiquidacaoDescricao: TStringField
      DisplayLabel = 'Descri'#231#227'o'
      FieldName = 'Descricao'
      Size = 30
    end
  end
end
